perm filename TMP.TMP[TEX,DEK]5 blob sn#518711 filedate 1980-06-27 generic text, type C, neo UTF8
COMMENT ⊗   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	Here's a change to the dumplist procedure in TEXSYN (maybe you have made it
C00004 ENDMK
C⊗;
Here's a change to the dumplist procedure in TEXSYN (maybe you have made it
already), the change avoids using the character "→" that isn't in ASCII:

	[match] if char=0 then s←"#"&(npars←npars+1) else s←"->";

(Did I send you this one already?)

And here's the way TEXSEM p15 looked before I made today's change:
	[leftnoad][rightnoad] begin real axis,s;
	axis←mathpar(axisheight,fontsize[style]);
	s←(maxh-axis) max (maxd+axis) # maximum distance from axis;
	t←t-(leftnoad-opennoad) # left→open,right→close;
	b←varsymbol(operand(q),curstyle,1.8*s);
After:
	[leftnoad][rightnoad] begin real axis,s,size;
	axis←mathpar(axisheight,fontsize[style]);
	s←(maxh-axis) max (maxd+axis) # maximum distance from axis;
	t←t-(leftnoad-opennoad) # left→open,right→close;
	size←(1.8*s) max (2*s-mathpar(xheight,fontsize[style]));
	b←varsymbol(operand(q),curstyle,size);